Imports Microsoft.VisualBasic
Imports System.Xml
Imports System.Collections
Imports DGZfP.EventPublisher
Imports system
Imports System.Data
Imports System.Data.OleDb
Imports System.Data.SqlClient
Imports DotNetNuke.Security
Imports DotNetNuke.Modules.UserDefinedTable



Namespace DGZfP.EventPublisher

    Public Class UdtSource
        Inherits SourceProvider

        Protected Overloads Overrides Function GetDataTable(ByVal notused1 As String, ByVal notused2 As String, ByVal ModuleID As String, ByVal NotUsed3 As String) As System.Data.DataTable
            Dim table As DataTable
            Dim udt As New UserDefinedTableController()
            table = udt.GetDataSet(ModuleID).Tables(0)
            Return table
        End Function
    End Class
End Namespace